object cadastroprogramasocial_frm: Tcadastroprogramasocial_frm
  Left = 224
  Top = 201
  HorzScrollBar.Increment = 82
  HorzScrollBar.Visible = False
  VertScrollBar.Increment = 39
  VertScrollBar.Visible = False
  ActiveControl = DBGListaPrograma
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Cadastro de Programas Sociais'
  ClientHeight = 443
  ClientWidth = 912
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    000001000200101000000000200068040000260000002020000000002000A810
    00008E0400002800000010000000200000000100200000000000400400000000
    0000000000000000000000000000FFFFFF01D5D5D541BEBEBE7FC7C7C7BFCCCC
    CCFFC9C9C9FFC6C6C6FFC4C4C4FFC4C4C4FFC6C6C6FFC9C9C9FFCCCCCCFFC7C7
    C7BFBEBEBE7FD6D6D641FFFFFF01FFFFFF01EBEBEB41DFDFDFBFD3D3D3FFD3D3
    D3FFD3D3D3FFD3D3D3FFD3D3D3FFD3D3D3FFD3D3D3FFD3D3D3FFD3D3D3FFD4D4
    D4FFD9D9D9FFEBEBEB41FFFFFF01FFFFFF01FFFFFF01D3D3D3FFDAD8D5FFDBCF
    C3FFDFD4C9FFD4C7B9FFCDC5BDFFCEC6BEFFD0C5BBFFD6D0CAFFD6D0CAFFD2C8
    C0FFE4E4E4FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01D1D1D1FFDBD8D5FFE3DA
    CFFFE8E1D8FFD9CEC2FFC9C5BEFFCCC8C1FFD5CDC6FFDFDDDBFFDFDDDBFFD6CE
    C7FFE6E6E6FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01D2D2D2FFDEDAD7FFDCD0
    C2FFE1D6C9FFD4C6B8FFDAD4CEFFD9D2CCFFC8BDB0FFC0B8ABFFC0B8ABFFCBC1
    B5FFE8E8E8FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01D2D2D2FFDFDCD9FFD9CC
    BFFFDDD2C6FFD2C4B5FFD9D2CBFFD8D0C9FFCEC2B5FFD0C7BEFFD0C7BEFFD0C4
    B9FFEAEAEAFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01D2D2D2FFE1DEDBFFE7DE
    D3FFEDE6DDFFDDD2C6FFE7E7E7FFE6E5E5FFCEC6BDFFC1BEB5FFC1BEB5FFD2CB
    C2FFEBEBEBFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01D2D2D2FFE3E0DCFFD9CC
    BFFFDDD2C6FFD3C4B6FFCFC7BDFFD1C8BEFFD2C7BCFFDBD4CDFFDBD4CDFFD4C9
    BEFFEDEDEDFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01D4D4D4FFE4E1DEFFDACE
    C1FFDFD4C8FFD4C6B7FFC3BBAEFFC7BFB3FFD4C9BEFFDED7D1FFDED7D1FFD5CB
    C1FFEEEEEEFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01D8D8D8FFE5E2DFFFE4DB
    CFFFEAE2D9FFDCD0C3FFE9E8E7FFE8E6E4FFD0C7BDFFC6C1B8FFC6C1B8FFD4CC
    C3FFEFEFEFFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01DCDCDCFFE8E5E3FFDBD1
    C6FFDFD6CBFFD6CABDFFDFD9D3FFDED7D1FFD5CBC0FFD9D3CBFFD9D3CBFFD8CF
    C6FFEFEFEFFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01DEDFDFFFEDEDEDFFEDED
    EDFFD7C9ABFFD1BE97FFE1D9C9FFCAB383FFE7E4DDFFCAB383FFDED6C4FFEBEB
    EBFFEEEEEEFFFFFFFF01FFFFFF01FFFFFF01B2D1EA7FBCCEDCFFE1E6EAFFEDED
    EDFFE3D7BFFFE0D1B2FFE7E1D4FFDDCAA4FFEAE7E1FFDDCAA4FF908B81FF7272
    72FFC3C3C3BFFFFFFF01FFFFFF01FFFFFF01FFFFFF01A1C3DCFFA2C7E1FFECEC
    ECFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFF797979FFB5B5
    B5FFF7F7F77FFFFFFF01FFFFFF01FFFFFF01FFFFFF01E8E8E8FFBAD3E5FFBAD5
    E8FFEBEBEBFFEBEBEBFFEBEBEBFFEBEBEBFFEBEBEBFFEBEBEBFFC7C7C7FFE2E2
    E2FFF8F8F87FFFFFFF01FFFFFF01FFFFFF01FFFFFF01F4F4F47FD2E4F0BFC1DC
    EFBFECEDED7FEDEDED7FEDEDED7FEDEDED7FEDEDED7FEDEDED7FEDEDED7FEEEE
    EE7FFFFFFF01FFFFFF01FFFFFF010000FFFF0000FFFF0000FFFF0000FFFF0000
    FFFF0000FFFF0000FFFF0000FFFF0000FFFF0000FFFF0000FFFF0000FFFF0000
    FFFF0000FFFF0000FFFF0000FFFF280000002000000040000000010020000000
    00008010000000000000000000000000000000000000FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01F0F0F0FFEEEEEEFFEAEAEAFFE9E9
    E9FFE9E9E9FFE7E7E7FFE2E2E2FFE2E2E2FFE2E2E2FFE2E2E2FFE2E2E2FFE2E2
    E2FFE7E7E7FFE9E9E9FFE9E9E9FFEAEAEAFFEDEDEDFFF0F0F0FFFFFFFF01FFFF
    FF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01D5D5D5FFC3C3C3FFBABABAFFB4B4B4FFB1B1B1FFAFAFAFFFACACACFFABAB
    ABFFAAAAAAFFA8A8A8FFA7A7A7FFA7A7A7FFA7A7A7FFA7A7A7FFA7A7A7FFA7A7
    A7FFA8A8A8FFAAAAAAFFABABABFFABABABFFAEAEAEFFB1B1B1FFB4B4B4FFBABA
    BAFFC3C3C3FFD6D6D6FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01EBEBEBFFDFDFDFFFD7D7D7FFC9C9C9FFCBCBCBFFCACACAFFCACACAFFCACA
    CAFFCACACAFFCACACAFFCACACAFFCACACAFFCACACAFFCACACAFFCACACAFFCACA
    CAFFCACACAFFCACACAFFCACACAFFCACACAFFCACACAFFCBCBCBFFCCCCCCFFCDCD
    CDFFD7D7D7FFEBEBEBFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01FFFFFF01E9E9E9FFDCDCDCFFDCDCDCFFDDDDDDFFDDDDDDFFDDDD
    DDFFDDDDDDFFDDDDDDFFDDDDDDFFDDDDDDFFDDDDDDFFDDDDDDFFDDDDDDFFDDDD
    DDFFDDDDDDFFDDDDDDFFDDDDDDFFDDDDDDFFDDDDDDFFDDDDDDFFDCDCDCFFDCDC
    DCFFE6E6E6FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01E2E2E2FFC8C8C8FFDDDDDDFFD9D6D3FFCEBFB1FFD1C3B6FFD1C3
    B6FFD1C3B6FFD1C3B6FFC8B7A7FFCEC1B6FFCEC1B6FFCEC1B6FFCDC0B4FFC8B8
    A8FFCEC1B6FFCEC1B6FFCEC1B6FFCEC1B6FFCEC1B6FFCEC1B6FFCEC2B6FFDDDD
    DDFFEAEAEAFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFC8C8C8FFDFDFDFFFD5CFC8FFE1D6C9FFEDE6DDFFEDE6
    DDFFEDE6DDFFEDE6DDFFCBBCADFFD0CEC9FFCAC7C0FFCAC7C0FFD5D3CFFFCCBE
    B2FFDFDFDFFFDFDFDFFFDFDFDFFFDFDFDFFFDFDFDFFFDFDFDFFFCDC0B5FFDFDF
    DFFFEBEBEBFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFC8C8C8FFE0E0E0FFD6D0C9FFE1D6C9FFEDE6DDFFEDE6
    DDFFEDE6DDFFEDE6DDFFCCBCADFFBCB9AFFFAEA99BFFAEA99BFFCBC8C1FFCCBF
    B3FFE0E0E0FFE0E0E0FFE0E0E0FFE0E0E0FFE0E0E0FFE0E0E0FFCDC1B5FFE0E0
    E0FFECECECFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFC8C8C8FFE2E2E2FFD7D1CAFFDACFC3FFE4DDD4FFE4DD
    D4FFE4DDD4FFE4DDD4FFCAB9AAFFDEDAD7FFDEDAD7FFDEDAD7FFDCD7D2FFCBBC
    AEFFDEDAD7FFDEDAD7FFDEDAD7FFDEDAD7FFDEDAD7FFDEDAD7FFCDBFB2FFE2E2
    E2FFECECECFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFC9C9C9FFE3E3E3FFD8D2CBFFCFBEACFFD5C6B6FFD5C6
    B6FFD5C6B6FFD5C6B6FFC4B19FFFD0C4B9FFD0C4B9FFD0C4B9FFCFC2B7FFC5B3
    A2FFD2C6BBFFD3C7BCFFD3C7BCFFD3C7BCFFD3C7BCFFD1C6BBFFC8B8A8FFE3E3
    E3FFEDEDEDFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFC9C9C9FFE4E4E4FFD9D2CCFFE1D6C9FFEDE6DDFFEDE6
    DDFFEDE6DDFFEDE6DDFFCDBDAEFFE4E4E4FFE4E4E4FFE4E4E4FFE2E0DFFFCEC1
    B4FFBEBAB0FFAEA99BFFAEA99BFFAEA99BFFAEA99BFFC6C3BCFFCFC3B7FFE4E4
    E4FFEEEEEEFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFC9C9C9FFE5E5E5FFDAD3CDFFE0D6CBFFECE6DFFFECE6
    DFFFECE6DFFFECE6DFFFCDBEAFFFE6E6E6FFE6E6E6FFE6E6E6FFE3E2E0FFCFC2
    B5FFD9D8D4FFD3D1CCFFD3D1CCFFD3D1CCFFD3D1CCFFDCDBD8FFD0C4B8FFE5E5
    E5FFEEEEEEFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFC9C9C9FFE6E6E6FFDAD4CEFFCAB8A6FFCEBEADFFCEBE
    ADFFCEBEADFFCEBEADFFC3AF9BFFCDBEB0FFCDBEB0FFCDBEB0FFCCBDAEFFC4B0
    9EFFCDBEB0FFCDBEB0FFCDBEB0FFCDBEB0FFCDBEB0FFCDBEB0FFC7B6A6FFE6E6
    E6FFEFEFEFFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFC9C9C9FFE7E7E7FFDBD5CFFFE1D6C9FFEDE6DDFFEDE6
    DDFFEDE6DDFFEDE6DDFFCDBEAFFFE7E7E7FFE7E7E7FFE7E7E7FFE5E3E2FFCFC2
    B6FFCAC8C0FFBEBBB0FFBEBBB0FFBEBBB0FFBEBBB0FFD1CFC9FFD1C4B9FFE7E7
    E7FFF0F0F0FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFCACACAFFE8E8E8FFDCD5CFFFE1D6C9FFEDE6DDFFEDE6
    DDFFEDE6DDFFEDE6DDFFCEBEAFFFE8E8E8FFE8E8E8FFE8E8E8FFE6E4E3FFD0C3
    B6FFD0CEC8FFC5C2BAFFC5C2BAFFC5C2BAFFC5C2BAFFD5D4CFFFD1C5B9FFE8E8
    E8FFF0F0F0FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFCACACAFFE9E9E9FFDDD6D0FFC9B8A8FFCEBFB0FFCEBF
    B0FFCEBFB0FFCEBFB0FFC3AF9CFFCDBFB1FFCDBFB1FFCDBFB1FFCCBDAFFFC4B1
    9EFFCDBFB1FFCDBFB1FFCDBFB1FFCDBFB1FFCDBFB1FFCDBFB1FFC8B7A6FFE9E9
    E9FFF1F1F1FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFCACACAFFEAEAEAFFDDD7D0FFE1D6C9FFEDE6DDFFEDE6
    DDFFEDE6DDFFEDE6DDFFCEBEAFFFD6D4D0FFCECBC4FFCECBC4FFDDDBD7FFD0C3
    B7FFEAEAEAFFEAEAEAFFEAEAEAFFEAEAEAFFEAEAEAFFEAEAEAFFD2C6BAFFEAEA
    EAFFF1F1F1FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DBDBDBFFCBCBCBFFEBEBEBFFDED7D1FFE1D6C9FFEDE6DDFFEDE6
    DDFFEDE6DDFFEDE6DDFFCEBFAFFFBFBCB2FFAEA99BFFAEA99BFFD1CEC7FFD1C4
    B7FFEBEBEBFFEBEBEBFFEBEBEBFFEBEBEBFFEBEBEBFFEBEBEBFFD2C6BAFFEBEB
    EBFFF1F1F1FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DEDEDEFFCECECEFFEBEBEBFFDED8D2FFCCBBABFFD1C3B4FFD1C3
    B4FFD1C3B4FFD1C3B4FFC4B19EFFD1C4B7FFD1C4B7FFD1C4B7FFCFC2B5FFC5B3
    A1FFD1C4B7FFD1C4B7FFD1C4B7FFD1C4B7FFD1C4B7FFD1C4B7FFC9B9A9FFEBEB
    EBFFF2F2F2FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01DFDFDFFFD0D0D0FFECECECFFDED8D2FFDDD1C4FFE8DFD5FFE8DF
    D5FFE8DFD5FFE8DFD5FFCDBCACFFE7E5E3FFE7E5E3FFE7E5E3FFE5E1DDFFCFC1
    B4FFE1DEDAFFDEDAD6FFDEDAD6FFDEDAD6FFDEDAD6FFE3E0DDFFD1C4B8FFECEC
    ECFFF2F2F2FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01E0E0E0FFD3D3D3FFECECECFFDFD8D2FFE1D6C9FFEDE6DDFFEDE6
    DDFFEDE6DDFFEDE6DDFFCEBFB0FFECECECFFECECECFFECECECFFE9E8E7FFD1C5
    B8FFBFBBB1FFAEA99BFFAEA99BFFAEA99BFFAEA99BFFC9C6BEFFD3C7BBFFECEC
    ECFFF2F2F2FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01E2E2E2FFD5D5D5FFEDEDEDFFDFD9D2FFE0D6CAFFECE6DDFFECE6
    DDFFECE6DDFFECE6DDFFCEBFB0FFECECECFFECECECFFECECECFFE9E8E7FFD1C5
    B8FFE5E4E2FFE1E0DDFFE1E0DDFFE1E0DDFFE1E0DDFFE7E6E5FFD3C7BBFFEDED
    EDFFF2F2F2FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01E3E3E3FFD7D7D7FFEDEDEDFFE7E4E2FFD1C3B7FFD2C6BAFFD2C6
    BAFFD2C6BAFFD2C6BAFFCCBDAEFFD2C6BAFFD2C6BAFFD2C6BAFFD2C5B9FFCDBE
    AFFFD2C6BAFFD2C6BAFFD2C6BAFFD2C6BAFFD2C6BAFFD2C6BAFFD5CAC0FFEDED
    EDFFF3F3F3FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01E5E5E5FFD9D9D9FFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEAE9
    E6FFE0D9CAFFE0D9CAFFE6E2D9FFEDEDEDFFE5E1D7FFE0D9CAFFE0D9CAFFEBEA
    E8FFECEBEBFFE0D9CAFFE0D9CAFFE4DFD4FFEDEDEDFFEDEDEDFFEDEDEDFFEDED
    EDFFF3F3F3FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01E0E3E5FFDBDBDBFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFDFD5
    C1FFB58E3DFFB58E3DFFCAB17FFFEDEDEDFFC6AB74FFB58E3DFFB58E3DFFE2DB
    CBFFE6E1D7FFB58E3DFFB58E3DFFC3A669FFE7E7E7FFE9E9E9FFECECECFFEDED
    EDFFEEEEEEFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01CDE0F0FFA6C3D9FFDDDDDDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFE5DB
    C9FFCEA85CFFCEA85CFFD9C293FFEDEDEDFFD8BE8AFFCEA85CFFCEA85DFFE6DF
    D1FFE9E4DBFFCEA85DFFCEA85CFFAC976EFF808080FF7A7A7AFF747474FF7B7B
    7BFFEDEDEDFFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF0197C3E5FFCDDAE4FFA0BED6FFC0D4E3FFECECECFFEDEDEDFFEDEDEDFFEDED
    EDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDED
    EDFFEDEDEDFFEDEDEDFFEDEDEDFFA1A1A1FF757575FF6D6D6DFF6F6F6FFFE1E1
    E1FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF0196BDD9FF78AED6FF80B4DBFFD9E2E8FFEDEDEDFFEDEDEDFFEDED
    EDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDED
    EDFFEDEDEDFFEDEDEDFFEDEDEDFF989898FF656565FF676767FFC7C7C7FFF6F6
    F6FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01E4E7EAFF93BCDAFFB9D2E4FF78B4DFFFEBEBEBFFEDEDEDFFEDED
    EDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDED
    EDFFEDEDEDFFEDEDEDFFEDEDEDFF8C8C8CFF5D5D5DFFC7C7C7FFDFDFDFFFF8F8
    F8FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01ECECECFFE1E1E1FF7CB8E3FFBDD6E7FF9CC8E7FFEFEFEFFFEFEF
    EFFFEFEFEFFFEFEFEFFFEFEFEFFFEFEFEFFFEFEFEFFFEFEFEFFFEFEFEFFFEFEF
    EFFFEFEFEFFFEFEFEFFFEFEFEFFF8E8E8EFFC7C7C7FFE1E1E1FFE1E1E1FFF8F8
    F8FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01EEEEEEFFE7E7E7FFD9E0E5FFD9E1E6FF95C4E6FFCBDBE6FFE8E8
    E8FFE8E8E8FFE8E8E8FFE8E8E8FFE8E8E8FFE8E8E8FFE8E8E8FFE8E8E8FFE8E8
    E8FFE8E8E8FFE8E8E8FFE8E8E8FFE2E2E2FFE6E6E6FFE6E6E6FFE3E3E3FFF9F9
    F9FFFFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01FAFAFAFFEEEEEEFFE8ECEDFFAED0EAFF99C9E9FFC7DCEAFFECED
    EDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDED
    EDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFEDEDEDFFECECECFFF1F1F1FFFFFF
    FF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01E1F0FBFFE5F1FBFFFFFFFF01FFFF
    FF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFF
    FF01FFFFFF01FFFFFF01FFFFFF01FFFFFF01FFFFFF0100000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    00000000000000000000000000000000000000000000}
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object pnl1: TPanel
    Left = 0
    Top = 0
    Width = 912
    Height = 44
    Align = alTop
    TabOrder = 0
    object btnCancelar: TBitBtn
      Left = 143
      Top = 3
      Width = 139
      Height = 33
      Hint = 'Cancelar Edi'#231#227'o de Dados'
      Caption = '&Cancelar [ESC]'
      Enabled = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      Visible = False
      OnClick = btnCancelarClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333000033338833333333333333333F333333333333
        0000333911833333983333333388F333333F3333000033391118333911833333
        38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
        911118111118333338F3338F833338F3000033333911111111833333338F3338
        3333F8330000333333911111183333333338F333333F83330000333333311111
        8333333333338F3333383333000033333339111183333333333338F333833333
        00003333339111118333333333333833338F3333000033333911181118333333
        33338333338F333300003333911183911183333333383338F338F33300003333
        9118333911183333338F33838F338F33000033333913333391113333338FF833
        38F338F300003333333333333919333333388333338FFF830000333333333333
        3333333333333333333888330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object btnGravar: TBitBtn
      Left = 4
      Top = 3
      Width = 139
      Height = 33
      Hint = 'Gravar Edi'#231#227'o de Dados'
      Caption = '&Gravar [F5]'
      Enabled = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      Visible = False
      OnClick = btnGravarClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333330000333333333333333333333333F33333333333
        00003333344333333333333333388F3333333333000033334224333333333333
        338338F3333333330000333422224333333333333833338F3333333300003342
        222224333333333383333338F3333333000034222A22224333333338F338F333
        8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
        33333338F83338F338F33333000033A33333A222433333338333338F338F3333
        0000333333333A222433333333333338F338F33300003333333333A222433333
        333333338F338F33000033333333333A222433333333333338F338F300003333
        33333333A222433333333333338F338F00003333333333333A22433333333333
        3338F38F000033333333333333A223333333333333338F830000333333333333
        333A333333333333333338330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object btnIncluir: TBitBtn
      Left = 4
      Top = 3
      Width = 139
      Height = 38
      Hint = 'Incluir Novo Programa Social'
      Caption = '&Incluir [Ins]'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = btnIncluirClick
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C0000120B0000120B00000000000000000000F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0EFEFEFECECECE5E5E5D8D8D8C8C8C8B3B7B4A5B1A6B5C6B7BCD3BFC4
        DAC6DBE5DCE9ECE9F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EDEDEDE8E8
        E8DEDEDED0D0D0BFBFBFAFAFAF9DA49E5F91642D8336147F1F12832111842212
        82211E83274A9B52A1C8A5E9ECE9F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EDEDEDE6E6E6DBDBDBCDCDCDBCBC
        BCAEAEAEA3A3A39D9D9D8295842F84381584251F9E431DB55616BD5A15BE5A1E
        BD5E26B05720973D15812261A668DFE7DFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0EFEFEFECECECE3E3E3D7D7D7C3C3C3B5B5B5A7A7A7A0A0A09C9C
        9C9A9A9A9A9A9A7A947D1B812424943D3AC0702DC76F1CC26324AD5D23A95B27
        AE612BC66E3DC77846BC731B882C3E9546DDE6DEF0F0F0F0F0F0F0F0F0F0F0F0
        EFEFEFE2E2E2D1D1D1C0C0C0B1B1B1A6A6A69F9F9F9C9C9C9A9A9A9A9A9A9494
        948A898872786E237E2B2C964252C78440C87A2FC76F2EBB6AE4E4E4DDDADCAC
        B7B12AC46C3EC87950C88458C0801D882C66A96DE9ECE9F0F0F0F0F0F0F0F0F0
        ECECECC6C6C6A4A4A49D9D9D9A9A9A9A9A9A9899998E8E8E7D7B7A776E687E68
        5B876653417531238C3465C88F57C98845C87D35C77436BC6FF3F6F4FAFAFAB5
        C1BA32C57142C87B51C88562C98E60BD82178224A3C9A7F0F0F0F0F0F0F0F0F0
        EFEFEFD7D7D7A9A9A99898998C8C8B7D7A79796C657C64578B68559C7159A174
        5B8A71511B7C2051AE6D6ACA9359C9894AC8803DC8783FBC75F3F6F5FBFBFBB6
        C1BB3CC57748C87F55C98662C98E6DC99430964453A05BEBEDEBF0F0F0F0F0F0
        EDEDEDC8C8C8827E7C78675C896A5A9A725BA1755DA4765DA3765D9F745B7253
        42354B241581226EC39066C38E4FAF7844AE723DAE6E43A66EF1F3F2FBFBFBB8
        C1BC3EAC6D46AE734DAE7757B17E6CC79352B1701B8226D8E3D9F0F0F0F0F0F0
        C7C2BF896B5BA1765EA77A60A67960A67960A579609C725B7857454432282B26
        232D5E3120892F6DC69282C39EDEDCDDD5D3D4D4D3D4DBDADBF6F6F6FDFDFDE9
        E9E9D5D3D4D4D3D3D4D2D3C6C3C55EB08160BF84158122BFD7C1F0F0F0F0F0F0
        E7E7E6A68B7BAA7C64AA7C64AA7C64A0755E715342392A22342E2C6663639F9E
        9E71A475208A3065C68D82C7A0FEFEFEFDFDFDFDFDFDFDFDFDFEFEFEFFFFFFFE
        FEFEFDFDFDFDFDFDFDFDFDE0DEDF58AE7D5FC286188426B6D2B9F0F0F0F0F0F0
        F0F0F0CDC8C5A77D68AD7F6699705A49362B332C294B4545706969A6A3A3F3F3
        F390C2941D892D5EC68974C496C9E2D3CAE2D4CCE2D6D0E1D7FCFCFCFEFEFEF1
        F2F1CFE1D7CEE2D7CCE2D6C5DCCF5AB6825BC082178224BCD5BEF0F0F0F0F0F0
        F0F0F0F0F0F0AE9B9162483B493E3A574F4E6157577C7676DBDADAFDFDFDFFFF
        FFB1D4B4127F1F57C2825AC8895FC78B68C79174C8987FBD9AF5F6F6FBFBFBC3
        C8C581C69E7BC89C70C79668C79160C98D4DB471178121D4E2D5F0F0F0E9E9E9
        C7C7C76D6C6C565050645A5A675D5D645C5CC5C2C2FEFEFEFFFFFFFFFFFFFFFF
        FFDFEDE024872D42AD6458C98861C98E6FCA9680CBA08CC0A2F5F6F6FBFBFBBE
        C2BF8EC9A784CBA377CA9B6ACA9361C98D319B4A45984DE7ECE8F0F0F0A8A7A7
        464242655B5B665C5C6C6565ADA9A9F3F3F3FFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFDFDFD77B37B1D892E5BC68764C99077CA9B8BCBA697C0A9F6F6F6FCFCFCC1
        C4C297C9AD8CCBA77CCB9E6CCA9458BE7F1682249AC49EF0F0F0F0F0F0EEEEEE
        AFAEAE5B5757888383E0DFDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFE8F2E9338E3B2B964263C88D7ACA9C90CBA99EC2ADDDE1DFE3E6E4C5
        CDC89ACAAF8DCBA87CCA9E62C58B238F374F9D57E4EAE4F0F0F0F0F0F0E5E5E5
        C3C3C3E5E5E5FAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFCCE2CE1B822524913960C38885CBA3A3CBB4AECABAAFCABBA6
        CAB699CBAF7DCA9F5DC286208D332B8B34D6E2D7F0F0F0F0F0F0E1E1E1B2B2B2
        E2E2E2FCFCFCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFCFE4D03C94431A862835A2525BBD8070C59274C5956D
        C59053BA7A32A04F168224308036A5B0A6E6E6E6F0F0F0F0F0F0F0F0F0EAEAEA
        D4D4D4CBCBCBDFDFDFFDFDFDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFF2F8F29FCAA2489B50157F1F14822217842613
        8222178020277127858C5A8F78689E9D9DD4D4D4EFEFEFF0F0F0F0F0F0F0F0F0
        F0F0F0EEEEEED7D7D7C9C9C9E3E3E3FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFCFACAE1CBAAD0ADA0CBA4A9
        D0ADCFE3D08B8886946F5EBF907A7A7572BCBCBCE6E6E6F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0ECECECD9D9D9C4C4C4EDEDEDFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFEBEBEB6A5F5ACA9881987B6EA0A0A0D4D4D4EFEFEFF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EAEAEAC4C4C4DBDBDBFAFAFAFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFC6C6C6AF8674C69781948F8CD2D2D2EFEFEFF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E4E4E4B1A9A5EDE8E6FFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFDFDFD8B7C76D39F889F867BDFDEDEF0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0D4D1CFB2998DE8E0
        DDFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEF2
        F2F2D1D1D1ADACAC7F7C7C464242937062C19581B6B0ADF0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0C7B9B2C598
        86E0D5D0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEEEEEEBDBCBC7C7C7C56
        53534B46464D4646595050655B5B6A5B58D6A28CB59B8FEBEAEAF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EAE9E9C39D
        8DCC9E8ADED2CCF9F9F9EFEFEFC8C8C89897976E6C6C4744444540405049495E
        56566C6262746969807676908888998F8BD5C7C1DAD5D3F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0D2CB
        C7CFA18E997F757875745451514540404E47475D54546A606070656571676771
        6666877B7BADA2A2B3A9AACBC9C9F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EDEC
        ECC6ACA1AE90858C8382857C7C8279797C7373746A6A716666887D7DAFA4A4D6
        CACAF6EAEAE7DDDD686163C6C4C5F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0DCD7D4DAAF9DBEA0949993918D8A8AA39B9BD1CACAEAE0E0F8F2F2FEF8F8FA
        F0F0DFCFCFA899994A4344625C60E7E7E7F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0EFEFE3E1E0EAE9E8D6D6D6DBDBDBDDDDDDCCCBCBC7BCBCD1C4C4B2A2A29A
        8B8B918383928484726868777274DCDBDCF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0BCBABAA49898A39797AA
        9E9EB1A6A6AFA5A5A59D9D969191EEEEEEF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E1E0E0A59F9FAAA3A3AD
        A8A8BBB9B9CBCACADAD9D9EAEAEAF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0D7D6D6E0E0E0E9
        E9E9F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0}
    end
    object btnAlterar: TBitBtn
      Left = 143
      Top = 3
      Width = 139
      Height = 38
      Hint = 'Alterar Programa Social Selecionado'
      Caption = '&Alterar [Ctrl+ENTER]'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = btnAlterarClick
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C0000120B0000120B00000000000000000000FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFE
        FEFEFEFEFDFDFDFAFAFAF2F2F2E5E5E5D6D6D6C3C3C3BCBCBCE3E3E3FDFDFDFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFCFCFCF7F7
        F7ECECECDEDEDECBCBCBBABABAAEAEAEA6A6A6A3A3A3A4A4A4C6C6C6F4F4F4FE
        FEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFEFEFEFBFBFBF5F5F5EBEBEBDBDBDBC9C9
        C9B9B9B9ACACACA5A5A5A2A2A2A2A2A2A1A1A19B9A9A8F8E8EAEAEAEE1E1E1FD
        FDFDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFEFEFEFBFBFBF4F4F4E6E6E6D4D4D4C1C1C1B3B3B3A8A8A8A3A3
        A3A2A2A2A2A2A2A1A1A19B9B9B8382826F68657961548464528A8683C7C7C7F7
        F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FEFEFEF3F3F3E1E1E1CECECEBEBEBEAFAFAFA6A6A6A2A2A2A1A1A1A1A1A19D9D
        9D929190837E7C756A637960528965509A6F569A6F56996E567E6C61ACACACE7
        E7E7FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FDFDFDDFDFDFB1B1B1A5A5A5A2A2A2A2A2A2A1A1A19998988685847B736E7B68
        5D836452936B55986D557655427655429B70579E71599E71598C685386807DCC
        CCCCF8F8F8FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FEFEFEEFEFEFBDBDBDA1A1A19797978583827C736D796458856553997059A174
        5B9B7058805D494733281A120E251B157555439F735BA0735BA0735B7F6B60B1
        B1B1E9E9E9FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FDFDFDE6E6E694929176696183685996705B9F745CA3765DA3765DA2765D7F5C
        494331261C151152504F6261610402022A1E188B6550A3765DA3765D906C5893
        8F8DCFCFCFFAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        ECEBEA8A72649A725BA77A60A67960A67960A67960A0755D85614D4C382C2C25
        214A4949858585BBBBBBC4C4C46262620E0C0B4231269C725BA67960A578607B
        6C63B5B5B5ECECECFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FCFCFCB2A299AA7D64AA7D64AA7D64A47860815E4B4331272B25225E5B5B8F8D
        8DCDCDCDF9F9F9E0E0E0AAA9A9C2C2C284848415110F574033A67961AA7D648F
        6C59929190D2D2D2F9F9F9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFEAE8E7A2806FAD7F66A87B635A4235342A27443E3D645D5D9A9696E6E6
        E6FFFFFFFFFFFFFFFFFFEDEDEDB4B3B3A9A7A76563631B14107E5C4AAD7E66AC
        7E657A6D66BABABAECECECFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFC4BBB67457484F403A504847655B5B736D6DC3C1C1FBFBFBFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFF8F8F8B6B4B4827D7D59555533251E966E5AB1
        8269967361979594D4D4D4FBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFCFC
        E6E6E68988885954555A5252685E5E635A5AA4A0A0F7F7F7FFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBBB9B9665F5F3A34334F3B30AF
        8169B0826B847871B9B9B9F0F0F0FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFE1E1E1
        5452525A5252695F5F655D5D989393E4E3E3FFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFAFAFAFFFFFFFFFFFFFFFFFFD7D6D66D65653C343380
        5E4EBA8971927363979594D9D9D9FCFCFCFFFFFFFFFFFFFFFFFFFFFFFFFEFEFE
        DDDDDD6B6969746E6EC7C5C5FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFCFCFCCBC4C4BBB4B4FFFFFFFFFFFFFFFFFFFFFFFFD2D0D06760603F
        322DB0836DB58770847771BEBEBEF2F2F2FEFEFEFFFFFFFFFFFFFFFFFFFCFCFC
        D2D2D2E3E3E3F5F5F5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFF7F7F7AFA19F877271F3F2F2FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE0DFDF59
        53535B4439C19078967666A1A0A0DDDDDDFDFDFDFFFFFFFFFFFFFBFBFBCBCBCB
        DEDEDEFAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4F3
        F3978A8A77615FCCC2C0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD4
        D3D3453E3C9E7663BD8D77877F7BC1C1C1F4F4F4FEFEFEFFFFFFFFFFFFFDFDFD
        E7E7E7D6D6D6DFDFDFFBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF2F1F19284
        846E5958928989F9F9F9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFC3C1C15A4942C5947C927669A5A5A5DFDFDFFCFCFCFFFFFFFFFFFFFFFFFF
        FFFFFFFEFEFEEAEAEAD7D7D7E0E0E0FDFDFDFFFFFFFFFFFFF7F7F79A8F8E765F
        5E857979EDECECFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFCFCFC8B8887866556BF917B7D7875C5C5C5F4F4F4FEFEFEFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFDFDFDEDEDEDD2D2D2EAEAEAFAFAFAA197977A62617567
        66EBE9E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFF0EFEF766B66CA9881967A6DA8A8A7E0E0E0FDFDFDFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFCFCD2D2D2988D8D7A6161756665DFDC
        DCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFCACACAB08875C59681999491DDDDDDFCFCFCFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFBFBA99F9F7E65646C5958C5BBB9FFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFEFEFE897A74D3A0899E8579EAEAE9FEFEFEFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFEFEFEB5ACAC7E6464766261B5ADACAF978CDACD
        C8FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEF4
        F4F4D4D4D4ABAAAA7E7C7C454140937162C0937FBBB5B2FEFEFEFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFCCC3C3876C6B766160C2BBBBFDFDFDCEC6C1C89A
        87D5C4BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4F4F4BBBBBB81818157
        54544C46464C4545585050655C5C6B5C58D5A18BB59A8EF9F8F8FFFFFFFFFFFF
        FFFFFFFFFFFFFEFDFDD1C9C8978178876E6BAEA4A4FEFEFEFFFFFFFAFAFAB79F
        94D2A08CCFBBB2F9F9F8F2F2F2CFCFCF9C9B9B716F6F4C48484640404F48485F
        56566C61617368687F74748F87879B918DD6C8C1E1DBD8FDFDFDFFFFFFFFFFFF
        FFFFFFFFFFFFD2CCCC856D6C856A69947D7BFCFCFCFFFFFFFFFFFFFFFFFFE6E2
        E0D0A592A987797A76765C59594540404C46465C5353695F5F6F646471666671
        6666847878ADA3A3B6ADAECFCDCDFBFBFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFDCD8D8846D6C856968938383BFB7B7FFFFFFFFFFFFFFFFFFFFFFFFFCFC
        FCC9B6ADBC96888F8483857C7C8279797D7474746A6A716666877B7BAA9F9FD5
        C9C9F3E7E7EDE2E2766F70D1CFD0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        E7E4E48B74738B6E6C90807FC3BABAFAF9F9FFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFE9E7E6C8A89AC6A3949B928F979494999393CEC6C6E7DDDDF8F1F1FEF9F9FA
        F0F0E2D2D2AA9C9C4F4848605B5FF4F4F4FFFFFFFFFFFFFFFFFFFEFEFEEBE7E7
        94807F8C6E6D877373C8C1C1FBFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFEEECEBEEEDECE5E4E3E6E6E6EDEDEDDAD9D9C6BDBDD3C4C4B6A6A69A
        8B8B918383928585756A6A7B7778E9E9E9FFFFFFFFFFFFFFFFFFF8F6F6A28C89
        8E6F6E7D6665D0CACAFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD6D4D4A09494A39696AA
        9E9EB1A5A5AEA5A5A79F9F999494FAFAFAFFFFFFFFFFFFFFFFFFF7F5F5A28D86
        9A8380CBC3C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4F4F4AEA7A7AEA7A7AF
        AAAAC2BFBFD5D3D3E7E7E7F8F8F8FFFFFFFFFFFFFFFFFFFFFFFFFEFEFEF2F0EF
        F2EEEEFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEE9E9E9EFEEEEF6
        F6F6FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
    end
    object btnExcluir: TBitBtn
      Left = 283
      Top = 3
      Width = 139
      Height = 38
      Hint = 'Excluir Programa Social Selecionado'
      Caption = '&Excluir [Ctrl+Del]'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = btnExcluirClick
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C0000120B0000120B00000000000000000000F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0EFEFEFECECECE5E5E5D6D6D6C4C4C4ABABAA99999DACACB4B8B8C0BC
        BCC1D0D0D1E1E1E1ECECECF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EDEDEDE8E8
        E8DEDEDECECECEBFBFBFADADAD9292926262853333901F1F9C1C1CA21F1FA422
        22A33C3CA369699EADADB2DBDBDBF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EDEDEDE6E6E6DBDBDBCDCDCDBCBC
        BCAEAEAEA3A3A39B9B9B7D7D883232961010AD1314BD1515CF1111DB1212DB1A
        1AD51717C20F0FB12D2DA37D7DA0D2D2D2EEEEEEF0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0EFEFEFECECECE3E3E3D5D5D5C3C3C3B5B5B5A7A7A7A0A0A09C9C
        9C9A9A9A9A9A9A75758A1B1BA81A1ABA3737E82929FB1515FE0707FF0C0CFF1C
        1CFF3333FC4343F12525C21111AE70709CCECECEF0F0F0F0F0F0F0F0F0F0F0F0
        EFEFEFE2E2E2D1D1D1C0C0C0B1B1B1A6A6A69F9F9F9C9C9C9A9A9A9A9A9A9494
        948A88876D6A721E1DA02424BE5455F64141FF2929FF1515FF0909FF0D0DFF1C
        1CFF3232FF4949FF6463FD403FCF1212B08080A6DFDFDFF0F0F0F0F0F0F0F0F0
        ECECECC6C6C6A4A4A49D9D9D9A9A9A9A9A9A9899998E8E8E7D7B7A766D677F68
        5B8263533A2C852121B97070F85D5DFF4647FF3131FF2121FF1A1AFF1C1CFF27
        27FF3838FF4C4CFF6262FF7878FD3737C62828A8B0B0B7ECECECF0F0F0F0F0F0
        EFEFEFD7D7D7A9A9A99898998C8C8C7D7A79796D657C64578B68559C7159A174
        5B805D611210A9605FE07879FF6162FF4D4DFF3B3BFF3030FF2C2CFF2E2DFF35
        35FF4343FF5253FF6565FF7777FF7D7DF41717B36F6FA3E1E1E1F0F0F0F0F0F0
        EDEDEDC8C8C8827E7D78665D896A5A9A715BA1755DA4765DA3765D9F745B7253
        412F23601B1BB78685EB8F8FD07F7FCB7676CB7070CB6C6CCB6B6BCB6C6BCB6F
        6FCB7474CB797ACB8181CB8889CB8686EA3D3DCB2F2FAACCCCD0F0F0F0F0F0F0
        C7C2BF896B5BA1765EA77960A67960A67960A579609D725B7857454332282B26
        2320207C3030C08E8EE5F0F0EFE4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4
        E4E4E4E4E4E4E4E4E4E4E4D6D6D58484D35B5BE01717A7BEBEC9F0F0F0F0F0F0
        E7E6E5A68B7BAA7C64AA7C64AA7C64A0755E725342392A22342E2D6663639F9E
        9D5050B33030C48787E6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFE9E9E97F7ED46363E81010AABABAC9F0F0F0F0F0F0
        F0F0F0CEC8C5A77D67AD7F6699705A49362C332C294B4545706969A5A2A2F3F3
        F36666C92C2CC37F7FE6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFF0F0F07D7CD56060E81212ABBEBECDF0F0F0F0F0F0
        F0F0F0F0F0F0AC998F62483B493E3A584F4F6057577C7575DCDBDBFDFDFDFEFE
        FE7777CF2727BF6F6FEF9695DD9898DD9E9EDDA5A5DDACACDDB1B1DDB2B2DDB0
        B1DDACACDDA7A7DDA1A0DD9B9BDC7474EA5353E01919A8C9C9D5F0F0F0E9E9E9
        C7C7C76D6C6C514B4B645A5A665D5D645C5CC4C2C2FEFEFEFFFFFFFFFFFFFEFE
        FFA6A6E01212B36464F56969FF7474FF8585FF9A9AFFABABFFB5B5FFB7B7FFB3
        B3FFA7A7FF9999FF8888FF7A7AFF7070FE3535CA3E3EB5DFDFE1F0F0F0A8A7A7
        464242655B5B665D5D6B6464ADAAAAF3F3F3FFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFE4E4F52727B84241D56969FF7A7AFF9090FFA9A9FFBEBDFFC9C9FFC9C9FFC2
        C2FFB3B3FFA2A3FF8E8EFF7C7CFF6868F01616B29A9AC7EEEEEEF0F0F0EEEEEE
        AFAEAE5C5858888383E0DFDFFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFEFEFE9797DC1616B46161EC7D7EFF9797FFB3B3FFCACAFFD8D9FFD6D6FFCB
        CBFFB9B9FFA6A7FF9191FF7979FC2727C04040B7DDDDE1F0F0F0F0F0F0E5E5E5
        C3C3C3E5E5E5FAFAFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFF9F9FC5F5FCB1515B46363ED9192FFB4B5FFCDCDFFDEDDFFD9D9FFCB
        CBFFB8B8FFA3A2FF7C7CFC3333C91818B5BDBDD8F0F0F0F0F0F0E1E1E1B2B2B2
        E1E1E1FBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFF0F0FA5D5DCB1616B44040D57979F59D9DFDB7B6FEB7B7FFA4
        A4FE8383F95A5AE82121BD1817A99292B2E6E6E6F0F0F0F0F0F0F0F0F0EAEAEA
        D4D4D4CACACADFDFDFFDFDFDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFF9F9FCA0A0DF3636BC1212B42828C33131CB3030CB2E
        2EC81C1CBB0F0EAA594499806973A1A1A1D4D4D4EFEFEFF0F0F0F0F0F0F0F0F0
        F0F0F0EEEEEED8D8D8C9C9C9E3E3E3FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFECECF7A6A6E16E6ECE5555C55353C45E
        5EC98A8AD67976949B7462BE907A827D7BBDBDBDE9E9E9F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0ECECECD9D9D9C4C4C4ECECECFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFCFCFCFCFCFCFE
        FEFEFEFEFEEBEAEA74645DCE9B848B7368A3A3A3D7D7D7EFEFEFF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EAEAEAC4C4C4DBDBDBFAFAFAFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFB0B0B0AC8472C39580948E8BD4D4D4EFEFEFF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E4E4E4B0A8A4ECE7E5FFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFCFCFC8A7C75D5A18AA48B80E4E4E3F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0D3D0CEB2988DE8E1
        DEFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEF1
        F1F1CFCFCFADACAC7B7979464141A47D6CC29684BFBBB9F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0C6B8B2C598
        85DED3CEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEDEDEDB7B7B77B7A7A55
        52524B45454D46465A5151655C5C6C5C58D5A08AA99287EBEAEAF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EAEAE9C39E
        8DCC9E8BDCD0CAF9F9F9EFEFEFC7C6C696959569686847444446404051494960
        56566D63637469698177779188889E948FD4C7C0D8D3D1F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0D0C9
        C5CDA08D997E747875755451514540404F48485E55556A606070656571666671
        6767887C7CAFA4A4B0A8A8CCCACAF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EDED
        ECC6AEA3AE90858D8382857C7C8178787C73737369697267678A7F7FB0A5A5D8
        CCCCF5EAEAE7DCDC6B6567C8C6C7F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0DAD6D3D8AE9CBEA0949893908E8A8AA39C9CD2CBCBEAE0E0F9F3F3FEF8F8FA
        EFEFDDCDCDA79999464040625C60EAEAEAF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0EFEFEFE3E1E0EAE9E8D5D5D5DDDDDDDDDDDDCAC9C9C5BBBBD0C2C2B1A2A299
        8A8A9183839284846E6464777273E3E3E3F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0BDBBBBA49797A49797AB
        9E9EB1A6A6AFA5A5A49C9C969191F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0DFDFA7A0A0AAA4A4AD
        A7A7BBB9B9CCCBCBDCDCDCEAEAEAF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EEEEEED2D1D1E0E0E0E9
        E9E9F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0}
    end
    object btnListar: TBitBtn
      Left = 422
      Top = 3
      Width = 139
      Height = 38
      Hint = 'Listar Rela'#231#227'o de Programas Sociais'
      Caption = '&Listar [Ctrl+P]'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnClick = btnListarClick
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C0000120B0000120B00000000000000000000F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
        EEEEEEEEEEEEEEEEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEF0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        EEEEEEEBEBEBE9E9E9E4E4E4E2E2E2E0E0E0DEDEDEDADADAD8D8D8D7D7D7D3D3
        D3D1D1D1CFCFCFCBCBCBC8C8C8C4C4C4C0C0C0BCBCBCBCBCBCDBDBDBEEEEEEF0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        EEEEEEE9E9E9DBDBDB9797978080808282828383838686868888888A8A8A8E8E
        8E8F8F8F9393939696969999999C9C9CA1A1A1A5A5A59797978F8F8FE5E5E5EE
        EEEEEEEEEEEEEEEEEEEEEEF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EEEEEEEEEEEE
        EBEBEBE8E8E8DFDFDFDBDBDBDEC7B8D8A88AD8A483D9A37FD9A27CDDB595DDB0
        89DA9B68DB975FDA9358DA9153D08246C87337C4692CD0A181616161B9B9B9DF
        DFDFE1E1E1E2E2E3E2E2E3E6E6E6EDECEDF0F0F0F0F0F0F0F0F0EEEEEEE4E3E4
        D3D3D3CCCCCCC3C3C38C8C8CD7C8BFD66D26DD7426E27F2DE58D3BF0D4BAD88F
        48D37C2AD37D2AD98732DA8A35D17E2ECB732AC26B28B875479C9C9C6A6A6A96
        9696969696969696949494959595B6B6B6EBEBEAF0F0F0F0F0F0EEEEEEB8B8B8
        7070706868686565655A5A5A797979E3B68DE79540E89B47DD933EDC9541DF9B
        45E2A54FE4A955E4AC5BD0944EBD7E4292573075442B653F2CA19C993D3D3D62
        6262636363636363636363656565626262C7C7C7EEEEEEF0F0F0EEEEEEC8C8C8
        6F6F6F6F6F6F6F6F6F6F6F6F565656A2A09DCEAB6ED0BB79D0C68CD1CD9CD4D6
        ADC2C08E9192726A6E5D5C655A5D6B60516B6A4B69684463657C8B8B4F4F4F6F
        6F6F6F6F6F6F6F6F6F6F6F6F6F6F4B4B4B8A8A8AE7E7E7F0F0F0F0F0F0DADADA
        767676767676767676767676767676666666819AA333899D4092A54891994692
        9E4A94A04B95A04D9197448995458992448792478084447F85577A7A52525276
        7676767676767676767676767676494949535353CFCFCFEEEEEEF0F0F0DCDCDC
        7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F5B5B5B5151512E494F23454B22454D2842
        43203B41263D3D253B3C233A3D20373B1E34371E2D2F202F2F1E31352E2F2F7F
        7F7F7F7F7F7F7F7F7F7F7F7F7F7F474747393939B1B1B1EEEEEEF0F0F0DFDFDF
        8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F5F5F5F2828282526262226272426272526
        262525252425252424242323242324242324242323232222222121212929298E
        8E8E8F8F8F8F8F8F8F8F8F8F8F8F4A4A4A2F2F2FAEAEAEEDEDEDF0F0F0E7E7E7
        B5B5B5B5B5B5B5B5B5B4B5B4B5B5B5B1B1B19292928F8F8F9191919393939797
        979B9B9BA2A2A2A3A3A3A4A4A4A7A7A7ABABABB0B0B0B5B5B5B5B5B5B5B5B5B5
        B5B5B5B5B5B5B5B5B5B5B5B5B5B55656562F2F2FB3B3B3EEEEEEF0F0F0EAEAEA
        B0B0B0A9ABA99DBEA18DC192ACB4ADB0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0
        B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0
        B0B0B1B1B1B2C8CCB4C6C9B0B0B0585858333333AFAFAFF0F0F0F0F0F0EEEEEE
        9A9A9A9DA09D71BA7661CB6592A3949999999999999999999999999999999999
        999999999999999999999999999999999999999999999999999A9A9A99999999
        9999999A9A7BD6DF83D2DB9E9E9E616161434343B1B1B1F0F0F0F0F0F0F0F0F0
        C6C6C7C3C4C5BDCFC0BBD5BFC8CDCACCCCCE7979795555555454545353534F4F
        4F4B4B4B4949494747474444454141413E3E3E3B3B3B393939373737353535D3
        D3D5F0F0F2D4F0F988DFFDF3F3F5A1A1A2545454B8B8B8F0F0F0F0F0F0F0F0F0
        EBEBEBDCDCDCDCDCDDDCDCDCDCDCDDDCDCDC9999993D3D3D4B4B4B5858585959
        595A5A5A5C5C5C5D5D5D5F5F5F616161626262646464656565676767696969B5
        B5B5DADADADBDBDBDDDEDEDADADBC3C3C3616161BFBFBFF0F0F0F0F0F0F0F0F0
        F0F0F0E1E1E1DCDCDCDDDDDDDDDDDDDDDDDDD6D6D67575757979798888888080
        807979797575757777777979797A7A7A7C7C7C7E7E7E7F7F7F8181818282829E
        9E9ECACACACACACACACACACACACACDCDCD7D7D7DC3C3C3F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0E5E5E5E3E3E3E6E6E6E6E6E6E6E6E6CDCDCDC1C1C1D6D6D6D6D6
        D6D7D7D7D4D4D4CFCFCFCACACAC7C7C7C5C5C5C4C4C4C3C3C3C3C3C3C5C5C5C6
        C6C6DDDDDDDFDFDFE2E2E2E5E5E5E6E6E6B8B8B8C2C2C2F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0EDEDEDE8E8E8E6E6E6E6E6E6E6E6E6D2D2D2DADADAD9D9
        D9D9D9D9D9D9D9DADADADDDDDDDBDBDBD9D9D9D7D7D7D7D7D7D8D8D8D9D9D9A4
        A4A4E3E3E3E6E6E7E6E6E6E6E6E6E6E6E6E7E7E7EBEBEBF0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E9E9E9E9E9E9E9E9
        E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9AD
        ADADE5E5E5F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EDEDEDEAEAEAEEEE
        EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEC4
        C4C4D6D6D6F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EEEEEEEDEDEDF3F3
        F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3DC
        DCDCC8C8C8F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F7F7
        F7F3F3F3F1F1F1F3F3F3F2F2F2F1F1F1F0F0F0F0F0F0F0F0F0F1F1F1F7F7F7ED
        EDEDC2C2C2F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F6F6
        F6F6F6F6F3F3F3F3F3F3F4F4F4F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6
        F6F6DADADAF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EFEFEFF2F2
        F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
        F2F2E3E3E3F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EFEFEFEDED
        EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDECECECECECECECECECECECECEC
        ECECE8E8E8F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0EFEF
        EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0}
    end
    object btnFechar: TBitBtn
      Left = 770
      Top = 3
      Width = 139
      Height = 38
      Hint = 'Fechar Cadastro de Programas Sociais'
      Caption = '&Fechar [Alt+F4]'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
      OnClick = btnFecharClick
      Glyph.Data = {
        360C0000424D360C000000000000360000002800000020000000200000000100
        180000000000000C0000120B0000120B00000000000000000000F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0EDEDEDE8E8E8E1E1E1DCDCDCE0E0E0EAEAEAEAEAEAE0E0E0
        DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
        DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
        DBDBDBDBDBDADADAD6D6D6CACACABDBDBDB4B4B4C1C1C1E0E0E0E6E6E6D0D0D0
        C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C1C1C1B7B7B7B1B1B1B1B1B1B1B1B1B1B1
        B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1
        B1B1B1B1B1B1B1B1ABADAE8096A86287A44B7CA469A6DADBDBDBEAEAEA5C5C5C
        5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5D5C5A5D5B595C5A5A5A5A5A5A5A5B5A5A
        5B5A5A5B5A5A5B5A5A5B5A5A5B5A5A5B5A5A5B5A5A5B5A5A5B5A5A5A5C595757
        6570536E834E7B9F4C7FAA4C7FA94B7EA85081A867A4D8DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB386CA1706B666D6B696D6B6A6D6B
        6A6D6B6A6D6B6A6D6B6A6D6B6A6D6B6A6D6B6A6D6B6A6D6B6A6D6A686F68644A
        86B54C83AE4D82AC4D81AA4D81AA4C80A95786AC66A3D6DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB3C6B9C6D67616A67656967666967
        666967666967666967666967666967666967666967666967666A67656C645F4B
        85B44E83AE4E82AC4E82AC4E82AC4C80AB5B8BB164A1D3DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB3C6B9C6B66606866646766656766
        6567666567666567666567666567666567666567666567666567666469635D4B
        86B64E83AF4E83AE4E83AE4E83AE4C81AD628FB3629FD2DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB3E6D9D6A635E6764626664636664
        6366646366646366646366646366646366646366646366646366646269615B4D
        87B74F84B04F84AF4F84AF4F84AF4D82AD6694B8619DCFDBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB3F6E9D67615B6462606462616462
        6164626164626164626164626164626164626164626164626164615F665E594E
        8AB95087B25086B15086B15086B14D84AF6C99BA609CCEDBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB3F709E65605A62615F6261606261
        6062616062616062616062616062616062616062616062616062605F645D574F
        8BBC5188B55187B35187B35187B34E85B1729CBF5E9ACCDBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB40709F645D58615F5D615F5E615F
        5E615F5E615F5E615F5E615F5E615F5E615F5E615F5E615F5E615E5C635B5550
        8CBD5289B65288B45288B45288B44F86B378A1C35C98CADBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB4071A0625B565F5D5B5F5D5C5F5D
        5C5F5D5C5F5D5C5F5D5C5F5D5C5F5D5C5F5D5C5F5D5C5F5D5C5F5C5A60585352
        8EBF538AB85389B65389B65389B64D82AD7CA5C65B96C8DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB4172A06059555D5B5A5D5B5B5D5B
        5B5D5B5B5D5B5B5D5B5B5D5B5B5D5B5B5D5B5B5D5B5B5D5B5B5D5A595E565153
        90C1548CB9548BB7548BB7548BB7497BA282AACA5A95C5DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB4273A25D58525B5A585B5A595B5A
        595B5A595B5A595B5A595B5A595B5A595B5A595B5A595B5A595B59575C554F54
        91C3558DBB558CB9568BB8578AB745709687ADCD5892C4DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB4275A35B55505958565958575958
        5759585759585759585759585759585759585759585759585759575559524C56
        93C4568EBC568DBA588BB73AA8DF23B8F78EB1CF5791C1DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB4375A55A534F5856555856565856
        5658565658565658565658565658565658565658565658565658555458504B57
        95C75790BE588FBB5A8CB827B8F55482AE92B4D25590BEDBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB4376A558524C5655535655545655
        54565554565554565554565554565554565554565554565554565452564F4958
        96C95891C05990BD5C8DBA27BAF74F7BA497B8D7558EBDDBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB4477A656504B5453525453535453
        53545353545353545353545353545353545353545353545353545251534D4859
        97CA5992C15A91BE5C8EBC27B9F74A72999DBDD9538CBBDBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB4479A7554D495350505351515351
        5153515153515153515153515153515153515153515153515153504F524A455B
        99CD5A93C35A92C15C90BF3BA9E121B7F6A0BFD9528ABADBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB457AA7524B46514E4D514F4F514F
        4F514F4F514F4F514F4F514F4F514F4F514F4F514F4F514F4F514E4D5048435C
        9BCE5B95C45B94C25C94C15C92BF588FBEA5C3DD5089B7DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB467AA9504A454F4D4D4F4E4E4F4E
        4E4F4E4E4F4E4E4F4E4E4F4E4E4F4E4E4F4E4E4F4E4E4F4E4E4F4D4C4E46415C
        9DD15B96C65B95C45B95C45A94C35691C2A9C6E14F87B6DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB467CAA4D47434D4B4A4D4C4C4D4C
        4C4D4C4C4D4C4C4D4C4C4D4C4C4D4C4C4D4C4C4D4C4C4D4C4C4D4B4A4B443F5E
        9ED35C97C85C96C65C96C65B95C65693C4ADCAE34D85B3DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB467DAA4D45414C49484C4A4A4C4A
        4A4C4A4A4C4A4A4C4A4A4C4A4A4C4A4A4C4A4A4C4A4A4C4A4A4C49484A423D5F
        9FD45D98C95D97C75D97C75C96C75793C5B2CFE64C84B1DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB487EAB4A44404A48474A49494A49
        494A49494A49494A49494A49494A49494A49494A49494A49494A484748413C60
        A1D75E9BCB5E99C95E99C95D98C95895C7B6D2E84A82B0DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB487FAD48423D4846454847474847
        47484747484747484747484747484747484747484747484747484545463E3961
        A3D85F9CCC5F9ACA5F9ACA5E99CA5996C8BBD5EB4981ADDBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DBDBDB497FAE463F3B4644434645454645
        45464545464545464545464545464545464545464545464545464343433C3762
        A4DA609CCE609BCC609BCC5F9ACC5997CAC0D9ED477EABDBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0DCDCDC4981AD453E394542414543424543
        4245434245434245434245434245434245434245434245434244414040393460
        A2DB5E9BD05F9BCE619CCE5F9BCE5A98CCC5DCF0467DAADBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E4E4E44980AC413730423B36423C37423C
        37423C37423C37423C37423C37423C37423C37423C37423C37413A353B322ABC
        DCF77AAED95B9ACD5F9CCE5F9CCE5A9ACDC9DFF2457CA7DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0ECECEC799EBB4A82AE4B83B04B83B14B83
        B14B83B14B83B14B83B14B83B14B83B14B83B14B83B14B83B14A82AF447CA980
        A9CBB9D3EAA7C9E56CA4D35B9ACF5999CFCDE2F3437AA6DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0EDEDEDCBDBE9C2DBEE9AC2E25A9AD0CFE3F54177A3DBDBDBF0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0EFEFEFE6E9EBC8DBECBDD6EDD3E7F74076A2E0E0E0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
        F0F0F0F0F0F0F0F0F0F0F0EFEFEFDEE5EACEE3F63E759FEAEAEA}
    end
  end
  object PGCPrograma: TPageControl
    Left = 0
    Top = 44
    Width = 912
    Height = 399
    ActivePage = TSListaPrograma
    Align = alClient
    HotTrack = True
    Images = principal_frm.ImageList1
    RaggedRight = True
    Style = tsFlatButtons
    TabOrder = 1
    OnChange = PGCProgramaChange
    OnChanging = PGCProgramaChanging
    object TSListaPrograma: TTabSheet
      Caption = 'Li&sta'
      ImageIndex = 126
      object DBGListaPrograma: TDBGrid
        Left = 0
        Top = 0
        Width = 904
        Height = 211
        Align = alClient
        DataSource = DSProgramaSocial
        Options = [dgTitles, dgColLines, dgRowSelect, dgAlwaysShowSelection]
        PopupMenu = ppmPrograma
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = DBGListaProgramaDblClick
        OnTitleClick = DBGListaProgramaTitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'DESCRICAO'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'MS Sans Serif'
            Title.Font.Style = [fsBold]
            Width = 774
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'IDPROGRAMA'
            Title.Alignment = taRightJustify
            Visible = True
          end>
      end
      object pnl2: TPanel
        Left = 0
        Top = 262
        Width = 904
        Height = 89
        Align = alBottom
        TabOrder = 1
        object lbl1: TLabel
          Left = -1
          Top = 41
          Width = 92
          Height = 13
          Caption = 'Pe&squisar Por:  [F2]'
          FocusControl = edtPesquisa
        end
        object rg1: TRadioGroup
          Left = 616
          Top = 8
          Width = 280
          Height = 73
          Caption = '  C&rit'#233'rio de Pesquisa:  '
          Columns = 2
          ItemIndex = 0
          Items.Strings = (
            'Descri'#231#227'&o'
            'C'#243'di&go')
          TabOrder = 0
        end
        object edtPesquisa: TEdit
          Left = -1
          Top = 59
          Width = 615
          Height = 21
          CharCase = ecUpperCase
          MaxLength = 35
          TabOrder = 1
          OnEnter = edtPesquisaEnter
          OnKeyDown = edtPesquisaKeyDown
        end
        object QuickRep1: TQuickRep
          Left = 0
          Top = 118
          Width = 794
          Height = 1123
          Frame.Color = clBlack
          Frame.DrawTop = False
          Frame.DrawBottom = False
          Frame.DrawLeft = False
          Frame.DrawRight = False
          DataSet = DMDados_frm.IBDSProgramaSocial
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          Functions.Strings = (
            'PAGENUMBER'
            'COLUMNNUMBER'
            'REPORTTITLE')
          Functions.DATA = (
            '0'
            '0'
            #39#39)
          Options = [FirstPageHeader, LastPageFooter]
          Page.Columns = 1
          Page.Orientation = poPortrait
          Page.PaperSize = A4
          Page.Values = (
            100.000000000000000000
            2970.000000000000000000
            100.000000000000000000
            2100.000000000000000000
            100.000000000000000000
            100.000000000000000000
            0.000000000000000000)
          PrinterSettings.Copies = 1
          PrinterSettings.OutputBin = Auto
          PrinterSettings.Duplex = False
          PrinterSettings.FirstPage = 0
          PrinterSettings.LastPage = 0
          PrinterSettings.UseStandardprinter = False
          PrinterSettings.UseCustomBinCode = False
          PrinterSettings.CustomBinCode = 0
          PrinterSettings.ExtendedDuplex = 0
          PrinterSettings.UseCustomPaperCode = False
          PrinterSettings.CustomPaperCode = 0
          PrinterSettings.PrintMetaFile = False
          PrinterSettings.PrintQuality = 0
          PrinterSettings.Collate = 0
          PrinterSettings.ColorOption = 0
          PrintIfEmpty = True
          ReportTitle = 'Rela'#231#227'o de Programas Sociais'
          SnapToGrid = True
          Units = MM
          Zoom = 100
          PrevFormStyle = fsStayOnTop
          PreviewInitialState = wsMaximized
          PrevInitialZoom = qrZoomToFit
          object ColumnHeaderBand1: TQRBand
            Left = 38
            Top = 112
            Width = 718
            Height = 24
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            AlignToBottom = False
            Color = clWhite
            TransparentBand = False
            ForceNewColumn = False
            ForceNewPage = False
            Size.Values = (
              63.500000000000000000
              1899.708333333333000000)
            PreCaluculateBandHeight = False
            KeepOnOnePage = False
            BandType = rbColumnHeader
            object QRLabel6: TQRLabel
              Left = 3
              Top = 3
              Width = 41
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                7.937500000000000000
                7.937500000000000000
                108.479166666666700000)
              Alignment = taLeftJustify
              AlignToBand = False
              AutoSize = True
              AutoStretch = False
              Caption = 'C'#243'digo'
              Color = clWhite
              Transparent = False
              WordWrap = True
              FontSize = 10
            end
            object QRLabel7: TQRLabel
              Left = 54
              Top = 3
              Width = 59
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                142.875000000000000000
                7.937500000000000000
                156.104166666666700000)
              Alignment = taLeftJustify
              AlignToBand = False
              AutoSize = True
              AutoStretch = False
              Caption = 'Descri'#231#227'o'
              Color = clWhite
              Transparent = False
              WordWrap = True
              FontSize = 10
            end
          end
          object DetailBand1: TQRBand
            Left = 38
            Top = 136
            Width = 718
            Height = 24
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            AlignToBottom = False
            Color = clWhite
            TransparentBand = False
            ForceNewColumn = False
            ForceNewPage = False
            Size.Values = (
              63.500000000000000000
              1899.708333333333000000)
            PreCaluculateBandHeight = False
            KeepOnOnePage = False
            BandType = rbDetail
            object QRDBText1: TQRDBText
              Left = 3
              Top = 3
              Width = 40
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                7.937500000000000000
                7.937500000000000000
                105.833333333333300000)
              Alignment = taLeftJustify
              AlignToBand = False
              AutoSize = False
              AutoStretch = False
              Color = clWhite
              DataSet = DMDados_frm.IBDSProgramaSocial
              DataField = 'IDPROGRAMA'
              Transparent = False
              WordWrap = True
              FontSize = 10
            end
            object QRDBText2: TQRDBText
              Left = 54
              Top = 3
              Width = 339
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                142.875000000000000000
                7.937500000000000000
                896.937500000000000000)
              Alignment = taLeftJustify
              AlignToBand = False
              AutoSize = False
              AutoStretch = False
              Color = clWhite
              DataSet = DMDados_frm.IBDSProgramaSocial
              DataField = 'DESCRICAO'
              Transparent = False
              WordWrap = True
              FontSize = 10
            end
          end
          object PageFooterBand1: TQRBand
            Left = 38
            Top = 188
            Width = 718
            Height = 33
            Frame.Color = clBlack
            Frame.DrawTop = True
            Frame.DrawBottom = True
            Frame.DrawLeft = False
            Frame.DrawRight = False
            AlignToBottom = False
            Color = clWhite
            TransparentBand = False
            ForceNewColumn = False
            ForceNewPage = False
            Size.Values = (
              87.312500000000000000
              1899.708333333333000000)
            PreCaluculateBandHeight = False
            KeepOnOnePage = False
            BandType = rbPageFooter
            object QRLabel9: TQRLabel
              Left = 1
              Top = 1
              Width = 224
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                2.645833333333333000
                2.645833333333333000
                592.666666666666700000)
              Alignment = taLeftJustify
              AlignToBand = False
              AutoSize = True
              AutoStretch = False
              Caption = 'SIGAS - Sistema Gestor de Assist'#234'ncia Social'
              Color = clWhite
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
              Transparent = False
              WordWrap = True
              FontSize = 8
            end
            object QRLabel10: TQRLabel
              Left = 1
              Top = 15
              Width = 111
              Height = 15
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                39.687500000000000000
                2.645833333333333000
                39.687500000000000000
                293.687500000000000000)
              Alignment = taLeftJustify
              AlignToBand = False
              AutoSize = True
              AutoStretch = False
              Caption = 'relacaoprogramas_frm'
              Color = clWhite
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
              Transparent = False
              WordWrap = True
              FontSize = 8
            end
          end
          object PageHeaderBand1: TQRBand
            Left = 38
            Top = 38
            Width = 718
            Height = 41
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = True
            Frame.DrawLeft = False
            Frame.DrawRight = False
            AlignToBottom = False
            Color = clWhite
            TransparentBand = False
            ForceNewColumn = False
            ForceNewPage = False
            Size.Values = (
              108.479166666666700000
              1899.708333333333000000)
            PreCaluculateBandHeight = False
            KeepOnOnePage = False
            BandType = rbPageHeader
            object QRLabel1: TQRLabel
              Left = 237
              Top = 3
              Width = 244
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                627.062500000000000000
                7.937500000000000000
                645.583333333333300000)
              Alignment = taCenter
              AlignToBand = True
              AutoSize = True
              AutoStretch = False
              Caption = 'Secretaria de Desenvolvimento Social'
              Color = clWhite
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold]
              ParentFont = False
              Transparent = False
              WordWrap = True
              FontSize = 10
            end
            object QRLabel2: TQRLabel
              Left = 253
              Top = 21
              Width = 212
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                669.395833333333300000
                55.562500000000000000
                560.916666666666700000)
              Alignment = taCenter
              AlignToBand = True
              AutoSize = True
              AutoStretch = False
              Caption = 'Prefeitura Municipal de Guaxup'#233
              Color = clWhite
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = [fsBold]
              ParentFont = False
              Transparent = False
              WordWrap = True
              FontSize = 10
            end
            object QRSysData1: TQRSysData
              Left = 0
              Top = 3
              Width = 68
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                0.000000000000000000
                7.937500000000000000
                179.916666666666700000)
              Alignment = taLeftJustify
              AlignToBand = True
              AutoSize = True
              Color = clWhite
              Data = qrsDateTime
              Transparent = False
              FontSize = 10
            end
            object QRSysData2: TQRSysData
              Left = 672
              Top = 3
              Width = 46
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                1778.000000000000000000
                7.937500000000000000
                121.708333333333300000)
              Alignment = taRightJustify
              AlignToBand = True
              AutoSize = True
              Color = clWhite
              Data = qrsPageNumber
              Transparent = False
              FontSize = 10
            end
          end
          object SummaryBand1: TQRBand
            Left = 38
            Top = 160
            Width = 718
            Height = 28
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            AlignToBottom = False
            Color = clWhite
            TransparentBand = False
            ForceNewColumn = False
            ForceNewPage = False
            Size.Values = (
              74.083333333333330000
              1899.708333333333000000)
            PreCaluculateBandHeight = False
            KeepOnOnePage = False
            BandType = rbSummary
            object QRLabel8: TQRLabel
              Left = 530
              Top = 7
              Width = 106
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                1402.291666666667000000
                18.520833333333330000
                280.458333333333300000)
              Alignment = taLeftJustify
              AlignToBand = False
              AutoSize = True
              AutoStretch = False
              Caption = 'Total de Registros'
              Color = clWhite
              Transparent = False
              WordWrap = True
              FontSize = 10
            end
            object QRSysData3: TQRSysData
              Left = 640
              Top = 7
              Width = 78
              Height = 17
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                44.979166666666670000
                1693.333333333333000000
                18.520833333333330000
                206.375000000000000000)
              Alignment = taRightJustify
              AlignToBand = True
              AutoSize = True
              Color = clWhite
              Data = qrsDetailCount
              Transparent = False
              FontSize = 10
            end
          end
          object TitleBand1: TQRBand
            Left = 38
            Top = 79
            Width = 718
            Height = 33
            Frame.Color = clBlack
            Frame.DrawTop = False
            Frame.DrawBottom = False
            Frame.DrawLeft = False
            Frame.DrawRight = False
            AlignToBottom = False
            Color = clWhite
            TransparentBand = False
            ForceNewColumn = False
            ForceNewPage = False
            Size.Values = (
              87.312500000000000000
              1899.708333333333000000)
            PreCaluculateBandHeight = False
            KeepOnOnePage = False
            BandType = rbTitle
            object QRLabel3: TQRLabel
              Left = 227
              Top = 5
              Width = 263
              Height = 23
              Frame.Color = clBlack
              Frame.DrawTop = False
              Frame.DrawBottom = False
              Frame.DrawLeft = False
              Frame.DrawRight = False
              Size.Values = (
                60.854166666666670000
                600.604166666666700000
                13.229166666666670000
                695.854166666666700000)
              Alignment = taCenter
              AlignToBand = True
              AutoSize = True
              AutoStretch = False
              Caption = 'Rela'#231#227'o de Programas Sociais'
              Color = clWhite
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -19
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
              Transparent = False
              WordWrap = True
              FontSize = 14
            end
          end
        end
      end
      object dbnvgrProgramaSocial: TDBNavigator
        Left = 0
        Top = 211
        Width = 904
        Height = 33
        DataSource = DSProgramaSocial
        VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
        Align = alBottom
        Flat = True
        Hints.Strings = (
          'Primeiro [Ctrl+Home]'
          'Anterior [Seta Cima]'
          'Pr'#243'ximo [Seta Baixo]'
          #218'ltimo [Ctrl+END]')
        ParentShowHint = False
        ConfirmDelete = False
        ShowHint = True
        TabOrder = 2
      end
      object Panel3: TPanel
        Left = 0
        Top = 244
        Width = 904
        Height = 18
        Align = alBottom
        Caption = 
          '[Ctrl+Home] | [Home] | [Seta Cima] | [Seta Baixo] | [END] | [Ctr' +
          'l+END]'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
      end
    end
    object TSDadosPrograma: TTabSheet
      Caption = '&Dados'
      ImageIndex = 133
      object Bevel2: TBevel
        Left = 599
        Top = 2
        Width = 305
        Height = 24
      end
      object Label1: TLabel
        Left = 48
        Top = 56
        Width = 33
        Height = 13
        Caption = 'C'#243'digo'
        FocusControl = DBEdit1
      end
      object Label2: TLabel
        Left = 48
        Top = 104
        Width = 48
        Height = 13
        Caption = 'Descri'#231#227'o'
        FocusControl = DBEdit2
      end
      object Label10: TLabel
        Left = 786
        Top = 8
        Width = 34
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = '0000'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 770
        Top = 8
        Width = 12
        Height = 13
        Caption = 'de'
      end
      object Label9: TLabel
        Left = 732
        Top = 8
        Width = 34
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = '0000'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label11: TLabel
        Left = 689
        Top = 8
        Width = 42
        Height = 13
        Caption = 'Registro:'
      end
      object DBEdit1: TDBEdit
        Left = 48
        Top = 72
        Width = 97
        Height = 19
        CharCase = ecUpperCase
        Color = clBtnFace
        Ctl3D = False
        DataField = 'IDPROGRAMA'
        DataSource = DSProgramaSocial
        ParentCtl3D = False
        ReadOnly = True
        TabOrder = 0
      end
      object DBEdit2: TDBEdit
        Left = 48
        Top = 120
        Width = 441
        Height = 21
        CharCase = ecUpperCase
        DataField = 'DESCRICAO'
        DataSource = DSProgramaSocial
        TabOrder = 1
        OnExit = DBEdit2Exit
      end
    end
    object TSBeneficiosPrograma: TTabSheet
      Caption = '&Benef'#237'cios Relacionados'
      ImageIndex = 129
      object PNSelecionar: TPanel
        Left = 0
        Top = 0
        Width = 420
        Height = 351
        Align = alLeft
        BevelInner = bvLowered
        BevelOuter = bvNone
        TabOrder = 0
        object GBSelecionar: TGroupBox
          Left = 1
          Top = 1
          Width = 418
          Height = 349
          Align = alClient
          Caption = '  Selecionar  [F6]  '
          TabOrder = 0
          object DBNSelecionar: TDBNavigator
            Left = 2
            Top = 322
            Width = 414
            Height = 25
            DataSource = DSSelecionar
            VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
            Align = alBottom
            Flat = True
            Hints.Strings = (
              'Primeiro [Ctrl+HOME]'
              'Anterior [Seta Cima]'
              'Pr'#243'ximo [Seta Baixo]'
              #218'ltimo [Ctrl+END]')
            ParentShowHint = False
            ConfirmDelete = False
            ShowHint = True
            TabOrder = 0
          end
          object DBGSelecionar: TDBGrid
            Left = 2
            Top = 15
            Width = 414
            Height = 307
            Align = alClient
            Color = clBtnFace
            DataSource = DSSelecionar
            Options = [dgTabs, dgRowSelect, dgAlwaysShowSelection]
            TabOrder = 1
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            OnDblClick = DBGSelecionarDblClick
            Columns = <
              item
                Expanded = False
                FieldName = 'DESCRICAO'
                Width = 391
                Visible = True
              end>
          end
        end
      end
      object PNAcao: TPanel
        Left = 420
        Top = 0
        Width = 64
        Height = 351
        Align = alClient
        BevelInner = bvSpace
        BevelOuter = bvLowered
        TabOrder = 1
        object SBtnEnviarSelecionado: TSpeedButton
          Left = 11
          Top = 105
          Width = 41
          Height = 41
          Hint = 'Vincular Selecionado'
          Caption = '[F9]'
          Flat = True
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            3333333333333333333333333333333333333333333333333333333333333333
            3333333333333333333333333333333333333333333FF3333333333333003333
            3333333333773FF3333333333309003333333333337F773FF333333333099900
            33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
            99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
            33333333337F3F77333333333309003333333333337F77333333333333003333
            3333333333773333333333333333333333333333333333333333333333333333
            3333333333333333333333333333333333333333333333333333}
          Layout = blGlyphTop
          NumGlyphs = 2
          ParentShowHint = False
          ShowHint = True
          OnClick = SBtnEnviarSelecionadoClick
        end
        object SBtnEnviarTodos: TSpeedButton
          Left = 11
          Top = 147
          Width = 41
          Height = 41
          Hint = 'Vincular Todos'
          Caption = '[F10]'
          Flat = True
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333333333333333333333333333333333333FFF3333333333333
            00333333333333FF77F3333333333300903333333333FF773733333333330099
            0333333333FF77337F3333333300999903333333FF7733337333333700999990
            3333333777333337F3333333099999903333333373F333373333333330999903
            33333333F7F3337F33333333709999033333333F773FF3733333333709009033
            333333F7737737F3333333709073003333333F77377377F33333370907333733
            33333773773337333333309073333333333337F7733333333333370733333333
            3333377733333333333333333333333333333333333333333333}
          Layout = blGlyphTop
          NumGlyphs = 2
          ParentShowHint = False
          ShowHint = True
          OnClick = SBtnEnviarTodosClick
        end
        object SBtnVoltarSelecionado: TSpeedButton
          Left = 11
          Top = 189
          Width = 41
          Height = 41
          Hint = 'Desvincular Selecionado'
          Caption = '[F11]'
          Flat = True
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            3333333333333333333333333333333333333333333333333333333333333333
            3333333333333FF3333333333333003333333333333F77F33333333333009033
            333333333F7737F333333333009990333333333F773337FFFFFF330099999000
            00003F773333377777770099999999999990773FF33333FFFFF7330099999000
            000033773FF33777777733330099903333333333773FF7F33333333333009033
            33333333337737F3333333333333003333333333333377333333333333333333
            3333333333333333333333333333333333333333333333333333333333333333
            3333333333333333333333333333333333333333333333333333}
          Layout = blGlyphTop
          NumGlyphs = 2
          ParentShowHint = False
          ShowHint = True
          OnClick = SBtnVoltarSelecionadoClick
        end
        object SBtnVoltarTodos: TSpeedButton
          Left = 11
          Top = 231
          Width = 41
          Height = 41
          Hint = 'Desvincular Todos'
          Caption = '[F12]'
          Flat = True
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000120B0000120B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            33333333333333333333333333333333333333FF333333333333300333333333
            33333773FF33333333333090033333333333373773FF33333333330990033333
            3333337F3773FF33333333099990033333333373F33773FFF333333099999007
            33333337F33337773333333099999903333333373F3333733333333309999033
            333333337F3337F333333333099990733333333373F3F77F3333333330900907
            3333333337F77F77F33333333003709073333333377377F77F33333337333709
            073333333733377F77F33333333333709033333333333377F7F3333333333337
            0733333333333337773333333333333333333333333333333333}
          Layout = blGlyphTop
          NumGlyphs = 2
          ParentShowHint = False
          ShowHint = True
          OnClick = SBtnVoltarTodosClick
        end
      end
      object PNVinculado: TPanel
        Left = 484
        Top = 0
        Width = 420
        Height = 351
        Align = alRight
        BevelInner = bvLowered
        BevelOuter = bvNone
        TabOrder = 2
        object DBText1: TDBText
          Left = 1
          Top = 1
          Width = 61
          Height = 16
          Align = alTop
          Alignment = taCenter
          AutoSize = True
          DataField = 'DESCRICAO'
          DataSource = DSProgramaSocial
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object GBVinculado: TGroupBox
          Left = 1
          Top = 17
          Width = 418
          Height = 333
          Align = alClient
          Caption = '  Vinculados  [F7]  '
          TabOrder = 0
          object DBGVinculado: TDBGrid
            Left = 2
            Top = 15
            Width = 414
            Height = 291
            Align = alClient
            Color = clBtnFace
            DataSource = DSVinculados
            Options = [dgTabs, dgRowSelect, dgAlwaysShowSelection]
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            OnDblClick = DBGVinculadoDblClick
            Columns = <
              item
                Expanded = False
                FieldName = 'DESCRICAO'
                Width = 389
                Visible = True
              end>
          end
          object DBNVinculado: TDBNavigator
            Left = 2
            Top = 306
            Width = 414
            Height = 25
            DataSource = DSVinculados
            VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
            Align = alBottom
            Flat = True
            Hints.Strings = (
              'Primeiro'
              'Anterior'
              'Pr'#243'ximo'
              #218'ltimo')
            ParentShowHint = False
            ConfirmDelete = False
            ShowHint = True
            TabOrder = 1
          end
        end
      end
    end
  end
  object DSProgramaSocial: TDataSource
    AutoEdit = False
    DataSet = DMDados_frm.IBDSProgramaSocial
    OnStateChange = DSProgramaSocialStateChange
    OnDataChange = DSProgramaSocialDataChange
    Left = 872
    Top = 400
  end
  object IBQSelecionar: TIBQuery
    Database = DMSistema_frm.IBDataBaseSIGAS
    Transaction = DMSistema_frm.IBTransactionSIGAS
    ForcedRefresh = True
    AfterOpen = IBQSelecionarAfterOpen
    BufferChunks = 1000
    CachedUpdates = False
    SQL.Strings = (
      'SELECT A.IDBENEFICIO, A.DESCRICAO'
      'FROM BENEFICIOS A'
      'WHERE A.IDBENEFICIO NOT IN (SELECT B.IDBENEFICIO'
      '                            FROM BENEFICIOSPROGRAMAS B'
      '                            WHERE B.IDPROGRAMA = :PROGRAMA)'
      'ORDER BY A.DESCRICAO')
    Left = 13
    Top = 88
    ParamData = <
      item
        DataType = ftInteger
        Name = 'PROGRAMA'
        ParamType = ptInput
        Value = '0'
      end>
    object IBQSelecionarIDBENEFICIO: TIntegerField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'IDBENEFICIO'
      Origin = 'BENEFICIOS.IDBENEFICIO'
      Required = True
    end
    object IBQSelecionarDESCRICAO: TIBStringField
      DisplayLabel = 'Descri'#231#227'o Benef'#237'cio'
      FieldName = 'DESCRICAO'
      Origin = 'BENEFICIOS.DESCRICAO'
      Required = True
      Size = 35
    end
  end
  object IBQVinculados: TIBQuery
    Database = DMSistema_frm.IBDataBaseSIGAS
    Transaction = DMSistema_frm.IBTransactionSIGAS
    ForcedRefresh = True
    AfterOpen = IBQVinculadosAfterOpen
    BufferChunks = 1000
    CachedUpdates = False
    SQL.Strings = (
      'SELECT A.IDBENEFICIO, B.DESCRICAO, A.IDPROGRAMA, C.DESCRICAO'
      'FROM BENEFICIOSPROGRAMAS A'
      'JOIN BENEFICIOS B'
      'ON B.IDBENEFICIO = A.IDBENEFICIO'
      'JOIN PROGRAMAS C'
      'ON C.IDPROGRAMA = A.IDPROGRAMA'
      'WHERE A.IDPROGRAMA = :PROGRAMA'
      'ORDER BY B.DESCRICAO')
    Left = 497
    Top = 88
    ParamData = <
      item
        DataType = ftInteger
        Name = 'PROGRAMA'
        ParamType = ptInput
        Value = '0'
      end>
    object IBQVinculadosIDBENEFICIO: TIntegerField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'IDBENEFICIO'
      Origin = 'BENEFICIOSPROGRAMAS.IDBENEFICIO'
      Required = True
    end
    object IBQVinculadosDESCRICAO: TIBStringField
      DisplayLabel = 'Descri'#231#227'o Benef'#237'cio'
      FieldName = 'DESCRICAO'
      Origin = 'BENEFICIOS.DESCRICAO'
      Required = True
      Size = 35
    end
    object IBQVinculadosIDPROGRAMA: TIntegerField
      DisplayLabel = 'Programa'
      FieldName = 'IDPROGRAMA'
      Origin = 'BENEFICIOSPROGRAMAS.IDPROGRAMA'
      Required = True
    end
    object IBQVinculadosDESCRICAO1: TIBStringField
      DisplayLabel = 'Descri'#231#227'o Programa'
      FieldName = 'DESCRICAO1'
      Origin = 'PROGRAMAS.DESCRICAO'
      Required = True
      Size = 35
    end
  end
  object DSSelecionar: TDataSource
    AutoEdit = False
    DataSet = IBQSelecionar
    Left = 45
    Top = 120
  end
  object DSVinculados: TDataSource
    AutoEdit = False
    DataSet = IBQVinculados
    Left = 529
    Top = 120
  end
  object IBSPAcaoPrograma: TIBStoredProc
    Database = DMSistema_frm.IBDataBaseSIGAS
    Transaction = DMSistema_frm.IBTransactionSIGAS
    ForcedRefresh = True
    StoredProcName = 'INCLUIRBENEFICIOPROGRAMA'
    Left = 441
    Top = 135
    ParamData = <
      item
        DataType = ftString
        Name = 'ACAO'
        ParamType = ptInput
        Value = #39'U'#39
      end
      item
        DataType = ftInteger
        Name = 'CODIGOPROGRAMA'
        ParamType = ptInput
        Value = '0'
      end
      item
        DataType = ftInteger
        Name = 'CODIGOBENEFICIO'
        ParamType = ptInput
        Value = '0'
      end>
  end
  object IBQTemp: TIBQuery
    Database = DMSistema_frm.IBDataBaseSIGAS
    Transaction = DMSistema_frm.IBTransactionSIGAS
    ForcedRefresh = True
    BufferChunks = 1000
    CachedUpdates = False
    Left = 212
    Top = 71
  end
  object ppmPrograma: TPopupMenu
    Left = 12
    Top = 266
    object BenefciosVinculados1: TMenuItem
      Caption = 'Benef'#237'cios Vinculados'
      Hint = 
        'Benef'#237'cios Eventuais e Cont'#237'nuos Vinculados ao Programa Social S' +
        'elecionado'
      ImageIndex = 0
      OnClick = BenefciosVinculados1Click
    end
  end
end
